home *** CD-ROM | disk | FTP | other *** search
/ Inter.Net 55-1 / Inter.Net 55-1.iso / CBuilder / Setup / BCB / data.z / bcb.exe / 0 / RCDATA / SAMPLE < prev    next >
Encoding:
Text File  |  1998-02-09  |  595 b   |  32 lines
  1. // Syntax Highlighting 
  2. void __fastcall TForm1::Button1Click(TObject *Sender)
  3. {
  4.   Caption = "The number is " + IntToStr(i);
  5.  
  6.   int i = 123456;
  7.   double d = 123.45;
  8.   char c = 'a';
  9.  
  10. #ifdef FULLMOON
  11.   asm
  12.   {
  13.     ASM MOV AX, 0x1234
  14.     ASM MOV i, AX
  15.   }
  16. #endif
  17.  
  18.   // Search Match, Text %Block& 
  19.   // Invalid breakpoint
  20.   int j = 07;
  21.   j += 0x3;
  22.   for (i = 0; i < 10; i++) // execution point
  23.   {
  24.     j++;   // Enabled breakpoint
  25.     j--;   // Disabled breakpoint
  26.     j += ; // Error line 
  27.     ListBox1->Items->Add(IntToStr(j));
  28.   }
  29.   j += #; // illegal character
  30. }
  31. |
  32.